home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The CICA Windows Explosion!
/
The CICA Windows Explosion! - Disc 2.iso
/
programr
/
editron.zip
/
EDITRON.Z
/
BASIC.TML
< prev
next >
Wrap
INI File
|
1994-08-22
|
2KB
|
100 lines
[templates]
int&eger=INTEGER &
long=LONG &
str&ing=STRING &
poi&nter=POINTER TO &
dim=DIM &
type=TYPE\t&
beg&in=BEGIN\n\t&\nEND
end=END &
glob&al=GLOBAL &
const=CONST &
if=IF (&) THEN \nENDIF
else=ElSE\n&
elseif=ElSEIF (&) THEN
endif=ENDIF &
sel&ect=SELECT\n\tCASE &\n\tCASE ELSE \nEND SELECT
case=CASE &
for=FOR & = TO \nNEXT
do=DO\nWHILE &
whi&le=WHILE &\nWEND
rem=REM &
'$inc&lude='$INCLUDE '&'
'$define='$DEFINE &
'$ifdef='$IFDEF &
'$ifndef='$IFNDEF &
'$else='$ELSE &
'$elseifdef='$ELSEIFDEF &
'$elseifndef='$ELSEIFNDEF &
'$endif='$ENDIF &
asc=ASC("&")
func&tion=FUNCTION &
sub=SUB &
gos&ub=GOSUB &
dec&lare=DECLARE &
print=PRINT &
static=STATIC &
got&o=GOTO &
open=OPEN & FOR AS #
close=CLOSE #
free&file=FREEFILE &
outp&ut=OUTPUT &
inp&ut=INPUT &
app&end=APPEND &
run=RUN &
varp&tr=VARPTR(&)
type=TYPE &
alloc&ate=ALLOCATE &,
realloc&ate=REALLOCATE &,
dealloc&ate=DEALLOCATE &
onerr&or=ON ERROR GOTO &
res&ume=RESUME &
trap=TRAP & FROM " "
endt&rap=END TRAP &
onend=ON END &
[operational_pairs]
TYPE \tEND
SELECT \tEND
BEGIN \tEND
IF \tENDIF | \tEND
ENDIF \bIF
END \bTYPE | \bSELECT | \bBEGIN | \bIF | \bFUNCTION | \bSUB
FOR \tNEXT
NEXT \bFOR
DO \tWHILE | \tUNTIL
WHILE \bDO | \tWEND
UNTIL \bDO
WEND \bWHILE
'$IFDEF \t'$ENDIF
'$IFNDEF \t'$ENDIF
'$ENDIF \b'$IFDEF | \b'$IFNDEF
[matching_pairs]
{ \t}
} \b{
( \t)
) \b(
[ \t]
] \b[
TYPE \tEND
SELECT \tEND
BEGIN \tEND
IF \tENDIF | \tEND
ENDIF \bIF
END \bTYPE | \bSELECT | \bBEGIN | \bIF | \bFUNCTION | \bSUB
FOR \tNEXT
NEXT \bFOR
DO \tWHILE | \tUNTIL
WHILE \bDO | \tWEND
UNTIL \bDO
WEND \bWHILE
'$IFDEF \t'$ENDIF
'$IFNDEF \t'$ENDIF
'$ENDIF \b'$IFDEF | \b'$IFNDEF